home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / t / BEGIN.bak.1 < prev    next >
Text File  |  2000-05-27  |  677b  |  23 lines
  1. ;Im Moment funktioniert der Which-Check nur, wenn C: KEIN ROOT ist, also nicht
  2. ; C:=Workbench:, sondern C: = Workbench:c/ <- wegen dem Schrägstrich
  3. if not exists ram:t
  4. makedir ram:t
  5. endif ;Siehste, so einfach geht das! :)
  6. assign exists AFCD: >NIL:
  7. IF warn
  8. requestchoice "AmigaPlus (C)" "Die CD ist nicht angemeldet!*nBitte zuerst Quickstart starten." "Exit" >NIL:
  9. quit;Keine CD angemeldet
  10. endif
  11. assign vorher: ""
  12. assign guis: ""
  13.  
  14. set whichcount 0 ;Anzahl der Dateien im falschen Dir
  15. delete t:filess t:reqtools >NIL: ;Killt temporäre Dateien!
  16. setenv .val 0 ;Für G4C
  17. set updater 3
  18. Gui vorher:Gauge.gc ;Startet Anzeige
  19. wait 1
  20. setenv .val 100
  21. gui vorher:sub.gc
  22. wait 1
  23. setenv .val 0